10 LETL=00
20 LETH=128
30 LETA=24696
40 SYS828
50 POKE788,L
60 POKE789,H
70 LETA=24664
80 SYS828